home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr13 / dessert.zip / GO.BAT < prev    next >
DOS Batch File  |  1993-01-21  |  8KB  |  493 lines

  1. echo off
  2. cls
  3. cat
  4. pause
  5. order
  6. pause
  7. type enjoy
  8. pause
  9. dessert
  10. pause
  11. dintro
  12. pause
  13. :reask
  14. dmenu
  15. answer MAKE CHOICE, PRESS ENTER
  16. if %answer%==1 goto d1a
  17. if %answer%==2 goto d2a
  18. if %answer%==3 goto d3a
  19. if %answer%==4 goto d4a
  20. if %answer%==5 goto d5a
  21. if %answer%==6 goto d6a
  22. if %answer%==7 goto d7a
  23. if %answer%==8 goto d8a
  24. if %answer%==9 goto d9a
  25. if %answer%==10 goto gloss
  26. if %answer%==11 goto end
  27. IF %ANSWER%==ORDER GOTO ORDER
  28. IF %ANSWER%== INFO GOTO INFO
  29. if %answer%==order goto order
  30. if %answer%==info goto info
  31. if %answer%==catalog catalog
  32. if %answer%==CATALOG CATALOG
  33. goto reask
  34. :d1a
  35. d1a
  36. pause
  37. :d1b
  38. d1b
  39. answer (B)ackup or (N)ext frame ?
  40. if %answer%==N goto d1c
  41. if %answer%==n goto d1c
  42. if %answer%==b goto d1a
  43. if %answer%==B goto d1a
  44. goto d1b
  45. :d1c
  46. d1c
  47. answer (B)ackup or (M)enu?
  48. if %answer%== B goto d1b
  49. if %answer%== b goto d1b
  50. if %answer%== m goto reask
  51. if %answer%== M goto reask
  52. goto d1c
  53. :d2a
  54. d2a
  55. pause
  56. :d2b
  57. d2b
  58. answer (B)ackup or (N)ext frame?
  59. if %answer%==B goto d2a
  60. if %answer%==b goto d2a
  61. if %answer%==n goto d2c
  62. if %answer%==N goto d2c
  63. goto d2b
  64. :d2c
  65. d2c
  66. answer (B)ackup or (M)enu?
  67. if %answer%==b goto d2b
  68. if %answer%==B goto d2b
  69. if %answer%==m goto reask
  70. if %answer%==M goto reask
  71. goto d2c
  72. :d3a
  73. d3a
  74. pause
  75. :d3b
  76. d3b
  77. answer (B)ackup or (N)ext frame?
  78. if %answer%==b goto d3a
  79. if %answer%==B goto d3a
  80. if %answer%==n goto d3c
  81. if %answer%==N goto d3c
  82. goto d3b
  83. :d3c
  84. d3c
  85. answer (B)ackup or (M)enu?
  86. if %answer%==b goto d3b
  87. if %answer%==B goto d3b
  88. if %answer%==m goto reask
  89. if %answer%==M goto reask
  90. goto d3c
  91. :d4a
  92. d4a
  93. pause
  94. :d4b
  95. d4b
  96. answer (B)ackup or (N)ext frame?
  97. if %answer%==b goto d4a
  98. if %answer%==B goto d4a
  99. if %answer%==n goto d4c
  100. if %answer%==N goto d4c
  101. goto d4b
  102. :d4c
  103. d4c
  104. answer (B)ackup or (M)enu?
  105. if %answer%==b goto d4b
  106. if %answer%==B goto d4b
  107. if %answer%==m goto reask
  108. if %answer%==M goto reask
  109. goto d4c
  110. :d5a
  111. d5a
  112. pause
  113. :d5b
  114. d5b
  115. answer (B)ackup or (M)enu?
  116. if %answer%==b goto d5a
  117. if %answer%==B goto d5a
  118. if %answer%==m goto reask
  119. if %answer%==M goto reask
  120. goto d5b
  121. :d6a
  122. d6a
  123. pause
  124. :d6b
  125. d6b
  126. answer (B)ackup or (N)ext frame?
  127. if %answer%==b goto d6a
  128. if %answer%==B goto d6a
  129. if %answer%==n goto d6c
  130. if %answer%==N goto d6c
  131. goto d6b
  132. :d6c
  133. d6c
  134. answer (B)ackup or (M)enu?
  135. if %answer%==b goto d6b
  136. if %answer%==B goto d6b
  137. if %answer%==m goto reask
  138. if %answer%==M goto reask
  139. goto d6c
  140. :d7a
  141. d7a
  142. pause
  143. :d7b
  144. d7b
  145. answer (B)ackup or (N)ext frame?
  146. if %answer%==b goto d7a
  147. if %answer%==B goto d7a
  148. if %answer%==n goto d7c
  149. if %answer%==N goto d7c
  150. goto d7b
  151. :d7c
  152. d7c
  153. answer (B)ackup or (N)ext frame?
  154. if %answer%==b goto d7b
  155. if %answer%==B goto d7b
  156. if %answer%==n goto d7d
  157. if %answer%==N goto d7d
  158. goto d7c
  159. :d7d
  160. d7d
  161. answer (B)ackup or (M)enu?
  162. if %answer%== b goto d7c
  163. if %answer%== B goto d7c
  164. if %answer%== m goto reask
  165. if %answer%== M goto reask
  166. goto d7d
  167. :d8a
  168. d8a
  169. pause
  170. :d8b
  171. d8b
  172. answer (B)ackup or (N)ext frame?
  173. if %answer%== b goto d8a
  174. if %answer%== B goto d8a
  175. if %answer%== n goto d8c
  176. if %answer%== N goto d8c
  177. goto d8b
  178. :d8c
  179. d8c
  180. answer (B)ackup or (M)enu?
  181. if %answer%== b goto d8b
  182. if %answer%== B goto d8b
  183. if %answer%== m goto reask
  184. if %answer%== M goto reask
  185. goto d8c
  186. :d9a
  187. d9a
  188. pause
  189. :d9b
  190. d9b
  191. answer (B)ackup or (N)ext frame?
  192. if %answer%==b goto d9a
  193. if %answer%==B goto d9a
  194. if %answer%==n goto d9c
  195. if %answer%==N goto d9c
  196. goto d9b
  197. :d9c
  198. d9c
  199. answer (B)ackup or (M)enu?
  200. if %answer%==b goto d9b
  201. if %answer%==B goto d9b
  202. if %answer%==m goto reask
  203. if %answer%==M goto reask
  204. goto d9c
  205. goto reask
  206. :ORDER
  207. ORDERME
  208. GOTO REASK
  209. :INFO
  210. VENDOR
  211. PAUSE
  212. info
  213. christ
  214. findme
  215. GOTO REASK
  216. :gloss
  217. gloss
  218. answer    (M)enu (F)orward or choose #?
  219. if %answer%==f goto gloss2
  220. if %answer%==F goto gloss2
  221. if %answer%==m goto reask
  222. if %answer%==M goto reask
  223. if %answer%==1 goto g1
  224. if %answer%==2 goto g1
  225. if %answer%==3 goto g1
  226. if %answer%==4 goto g1
  227. if %answer%==5 goto g2
  228. if %answer%==6 goto g2
  229. if %answer%==7 goto g2
  230. if %answer%==8 goto g2
  231. if %answer%==9 goto g3
  232. if %answer%==10 goto g3
  233. if %answer%==11 goto g3
  234. if %answer%==12 goto g3
  235. if %answer%==13 goto g4
  236. if %answer%==14 goto g4
  237. if %answer%==15 goto g5
  238. if %answer%==16 goto g5
  239. if %answer%==17 goto g5
  240. if %answer%==18 goto g6
  241. if %answer%==19 goto g6
  242. if %answer%==20 goto g6
  243. if %answer%==21 goto g6
  244. if %answer%==22 goto g6
  245. if %answer%==23 goto g7
  246. if %answer%==24 goto g7
  247. if %answer%==25 goto g7
  248. if %answer%==26 goto g7
  249. if %answer%==27 goto g8
  250. if %answer%==29 goto g8
  251. if %answer%==28 goto g8
  252. if %answer%==30 goto g8
  253. if %answer%==31 goto g9
  254. if %answer%==32 goto g9
  255. if %answer%==33 goto g9
  256. if %answer%==34 goto g9
  257. if %answer%==35 goto g10
  258. if %answer%==36 goto g10
  259. if %answer%==37 goto g10
  260. if %answer%==38 goto g10
  261. if %answer%==39 goto g11
  262. if %answer%==40 goto g11
  263. if %answer%==41 goto g11
  264. if %answer%==42 goto g11
  265. if %answer%==43 goto g12
  266. if %answer%==44 goto g12
  267. if %answer%==45 goto g12
  268. if %answer%==46 goto g12
  269. if %answer%==47 goto g12
  270. if %answer%==48 goto g13
  271. if %answer%==49 goto g13
  272. if %answer%==50 goto g13
  273. if %answer%==51 goto g14
  274. if %answer%==52 goto g14
  275. if %answer%==53 goto g14
  276. if %answer%==54 goto g14
  277. if %answer%==55 goto g14
  278. if %answer%==56 goto g15
  279. if %answer%==57 goto g15
  280. if %answer%==58 goto g15
  281. if %answer%==59 goto g15
  282. if %answer%==60 goto g15
  283. if %answer%==61 goto g16
  284. if %answer%==62 goto g16
  285. if %answer%==63 goto g16
  286. if %answer%==64 goto g16
  287. if %answer%==65 goto g16
  288. if %answer%==66 goto g17
  289. if %answer%==67 goto g17
  290. if %answer%==68 goto g17
  291. if %answer%==69 goto g17
  292. if %answer%==70 goto g17
  293. if %answer%==71 goto g18
  294. if %answer%==72 goto g18
  295. goto gloss
  296. :gloss2
  297. gloss2
  298. answer     (M)enu or (B)ackup choose #?
  299. if %answer%== m goto reask
  300. if %answer%== M goto reask
  301. if %answer%== b goto gloss
  302. if %answer%== B goto gloss
  303. if %answer%== 73 goto g18
  304. if %answer%== 74 goto g18
  305. if %answer%== 75 goto g19
  306. if %answer%== 76 goto g19
  307. if %answer%== 77 goto g19
  308. if %answer%== 78 goto g20
  309. if %answer%== 79 goto g20
  310. if %answer%== 80 goto g20
  311. if %answer%== 81 goto g20
  312. if %answer%== 82 goto g20
  313. if %answer%== 83 goto g21
  314. if %answer%== 84 goto g21
  315. if %answer%== 85 goto g21
  316. if %answer%== 86 goto g21
  317. if %answer%== 87 goto g21
  318. if %answer%== 88 goto g21
  319. if %answer%== 89 goto g22
  320. if %answer%== 90 goto g22
  321. if %answer%== 91 goto g22
  322. if %answer%== 92 goto g22
  323. if %answer%== 93 goto g22
  324. if %answer%== 94 goto g23
  325. if %answer%== 95 goto g23
  326. if %answer%== 96 goto g23
  327. if %answer%== 97 goto g23
  328. if %answer%== 98 goto g23
  329. if %answer%== 99 goto joke
  330. if %answer%== 100 goto g24
  331. if %answer%== 101 goto g24
  332. if %answer%== 102 goto g24
  333. if %answer%== 103 goto g24
  334. if %answer%== 104 goto g24
  335. if %answer%== 105 goto g24
  336. if %answer%== 106 goto g25
  337. if %answer%== 107 goto g25
  338. if %answer%== 108 goto g25
  339. if %answer%== 109 goto g25
  340. if %answer%== 110 goto g25
  341. if %answer%== 111 goto g26
  342. if %answer%== 112 goto g26
  343. if %answer%== 113 goto g26
  344. if %answer%== 114 goto g26
  345. if %answer%== 115 goto g26
  346. if %answer%== 116 goto g27
  347. if %answer%== 117 goto g27
  348. if %answer%== 118 goto g27
  349. if %answer%== 119 goto g27
  350. if %answer%== 120 goto g27
  351. if %answer%== 121 goto g28
  352. if %answer%== 122 goto g28
  353. if %answer%== 123 goto g28
  354. if %answer%== 124 goto g28
  355. if %answer%== 125 goto g28
  356. if %answer%== 126 goto g28
  357. if %answer%== 127 goto g29
  358. if %answer%== 128 goto g29
  359. if %answer%== 129 goto g30
  360. if %answer%== 130 goto g31
  361. if %answer%== 131 goto g32
  362. goto gloss2
  363. :g1
  364. g1
  365. pause
  366. goto gloss
  367. :g2
  368. g2
  369. pause
  370. goto gloss
  371. :g3
  372. g3
  373. pause
  374. goto gloss
  375. :g4
  376. g4
  377. pause
  378. goto gloss
  379. :g5
  380. g5
  381. pause
  382. goto gloss
  383. :g6
  384. g6
  385. pause
  386. goto gloss
  387. :g7
  388. g7
  389. pause
  390. goto gloss
  391. :g8
  392. g8
  393. pause
  394. goto gloss
  395. :g9
  396. g9
  397. pause
  398. goto gloss
  399. :g10
  400. g10
  401. pause
  402. goto gloss
  403. :g11
  404. g11
  405. pause
  406. goto gloss
  407. :g12
  408. g12
  409. pause
  410. goto gloss
  411. :g13
  412. g13
  413. pause
  414. goto gloss
  415. :g14
  416. g14
  417. pause
  418. goto gloss
  419. :g15
  420. g15
  421. pause
  422. goto gloss
  423. :g16
  424. g16
  425. pause
  426. goto gloss
  427. :g17
  428. g17
  429. pause
  430. goto gloss
  431. :g18
  432. g18
  433. pause
  434. goto gloss
  435. :g19
  436. g19
  437. pause
  438. goto gloss2
  439. :g20
  440. g20
  441. pause
  442. goto gloss2
  443. :g21
  444. g21
  445. pause
  446. goto gloss2
  447. :g22
  448. g22
  449. pause
  450. goto gloss2
  451. :g23
  452. g23
  453. pause
  454. goto gloss2
  455. :g24
  456. g24
  457. pause
  458. goto gloss2
  459. :g25
  460. g25
  461. pause
  462. goto gloss2
  463. :g26
  464. g26
  465. pause
  466. goto gloss2
  467. :g27
  468. g27
  469. pause
  470. goto gloss2
  471. :g28
  472. g28
  473. pause
  474. goto gloss2
  475. :g29
  476. g29
  477. pause
  478. goto gloss2
  479. :g30
  480. g30
  481. pause
  482. goto gloss2
  483. :g31
  484. g31
  485. pause
  486. goto gloss2
  487. :g32
  488. g32
  489. pause
  490. goto gloss2
  491. :end
  492. cls
  493.